-- card: 3207 from stack: in
-- bmap block id: 0
-- flags: 4000
-- background id: 2777
-- name: 
----- HyperTalk script -----
on recalculate
  beep
end recalculate


-- part 1 (button)
-- low flags: 00
-- high flags: E006
-- rect: left=336 top=78 right=96 bottom=405
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Letter
----- HyperTalk script -----
on mouseUp
  set the hilite of button "letter" to true
  set the hilite of button "A4" to false
  set the hilite of button "Legal" to false
  set the hilite of button "Tabloid" to false
  set the hilite of button "Other" to false
  set the hilite of button "B5" to false
  put "66.00" into card field "pageLength"
  set the locktext of card field "pageLength" to true
  send closefield
end mouseUp



-- part 2 (button)
-- low flags: 00
-- high flags: A006
-- rect: left=336 top=97 right=115 bottom=405
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: A4
----- HyperTalk script -----
on mouseUp
  set the hilite of button "letter" to false
  set the hilite of button "A4" to true
  set the hilite of button "Legal" to false
  set the hilite of button "Tabloid" to false
  set the hilite of button "Other" to false
  set the hilite of button "B5" to false
  put "70.02" into card field "pageLength"
  set the locktext of card field "pageLength" to true
  send closeField
end mouseUp



-- part 3 (button)
-- low flags: 00
-- high flags: A006
-- rect: left=336 top=116 right=134 bottom=405
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Legal
----- HyperTalk script -----
on mouseUp
  set the hilite of button "letter" to false
  set the hilite of button "A4" to false
  set the hilite of button "Legal" to true
  set the hilite of button "Tabloid" to false
  set the hilite of button "Other" to false
  set the hilite of button "B5" to false
  put "84.00" into card field "pageLength"
  set the locktext of card field "pageLength" to true
  send closeField
end mouseUp



-- part 4 (button)
-- low flags: 00
-- high flags: A006
-- rect: left=336 top=136 right=154 bottom=405
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: B5
----- HyperTalk script -----
on mouseUp
  set the hilite of button "letter" to false
  set the hilite of button "A4" to false
  set the hilite of button "Legal" to false
  set the hilite of button "Tabloid" to false
  set the hilite of button "Other" to false
  set the hilite of button "B5" to true
  put "59.00" into card field "pageLength"
  set the locktext of card field "pageLength" to true
  send closeField
end mouseUp



-- part 5 (button)
-- low flags: 00
-- high flags: A006
-- rect: left=337 top=156 right=174 bottom=406
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Tabloid
----- HyperTalk script -----
on mouseUp
  set the hilite of button "letter" to false
  set the hilite of button "A4" to false
  set the hilite of button "Legal" to false
  set the hilite of button "Tabloid" to true
  set the hilite of button "Other" to false
  set the hilite of button "B5" to false
  put "102.00" into card field "pageLength"
  set the locktext of card field "pageLength" to true
  send closefield
end mouseUp



-- part 6 (field)
-- low flags: 01
-- high flags: 0002
-- rect: left=252 top=81 right=99 bottom=305
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: PageLength


-- part 7 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=252 top=106 right=124 bottom=305
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Top


-- part 8 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=251 top=130 right=148 bottom=304
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Rows
----- HyperTalk script -----
on closeField
  put trunc(card field "rows") into card field "rows"
  pass closeField
end closefield



-- part 9 (field)
-- low flags: 01
-- high flags: 0002
-- rect: left=251 top=156 right=174 bottom=304
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: RowSpace
----- HyperTalk script -----
on mouseUp
  show card field "HideRow"
end mouseUp


-- part 11 (field)
-- low flags: 01
-- high flags: 0002
-- rect: left=251 top=202 right=220 bottom=304
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Bottom


-- part 16 (button)
-- low flags: 00
-- high flags: A006
-- rect: left=337 top=177 right=195 bottom=406
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Other
----- HyperTalk script -----
on mouseUp
  set the hilite of button "letter" to false
  set the hilite of button "A4" to false
  set the hilite of button "Legal" to false
  set the hilite of button "Tabloid" to false
  set the hilite of button "Other" to true
  set the hilite of button "B5" to false
  Set the lockText of card field "pageLength" to false
  click at 0,0
  type tab
  send closefield
end mouseUp



-- part 12 (field)
-- low flags: 81
-- high flags: 0007
-- rect: left=360 top=35 right=216 bottom=509
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Explanation
----- HyperTalk script -----
on mouseUp
  hide target
  pass mouseUp
end mouseUp



-- part 14 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=251 top=180 right=198 bottom=304
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: LineSpace
----- HyperTalk script -----

on closeField
  put trunc(card field "lineSpace") into card field "lineSpace"
  pass closeField
end closeField


-- part 17 (field)
-- low flags: 81
-- high flags: 0002
-- rect: left=316 top=131 right=202 bottom=409
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: HideRow
----- HyperTalk script -----
on mouseUp
  hide card field "HideRow"
end mouseUp


-- part 19 (field)
-- low flags: 01
-- high flags: 0002
-- rect: left=89 top=15 right=34 bottom=229
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: GridName
----- HyperTalk script -----
on mouseDown
  ask "Change the name of this card to:" with card field "gridname"
  put it into card field "gridname"
end mouseDown


-- part 21 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=258 top=8 right=27 bottom=282
-- title width / last selected line: 0
-- icon id / first selected line: 16560 / 16560
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Right
----- HyperTalk script -----
on mouseUp
  visual wipe left
  go next
end mouseUp



-- part 22 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=233 top=8 right=27 bottom=257
-- title width / last selected line: 0
-- icon id / first selected line: 15420 / 15420
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Left
----- HyperTalk script -----
on mouseUp
  visual wipe right
  go previous
end mouseUp



-- part 23 (button)
-- low flags: 00
-- high flags: 8002
-- rect: left=359 top=276 right=294 bottom=457
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Now what?
----- HyperTalk script -----
on mouseUp
  set the visible of card field "explanation" to not the visible of card field "explanation"
end mouseUp



-- part 26 (button)
-- low flags: 00
-- high flags: 8002
-- rect: left=360 top=295 right=313 bottom=458
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Another grid?
----- HyperTalk script -----
on mouseUp
  answer "Design Another Grid?" with "cancel" or "yes"
  if it is "no" then exit mouseUp
  else
    doMenu "Copy Card"
    doMenu "Paste Card"
  end if
  Ask "What is the name of this grid?"
  Put it into card field "gridName"
end mouseUp



-- part contents for card part 12
----- text -----
Set page length in RSG's File menu.
Set line spacing in RSG's Format menu.

Set Top, Bottom, Number of Rows and Space Between Rows in the RSG Grid Setup Menu

-- part contents for card part 6
----- text -----
66.00

-- part contents for card part 14
----- text -----
13

-- part contents for card part 9
----- text -----
1 pt

-- part contents for card part 7
----- text -----
3.00

-- part contents for card part 8
----- text -----
55

-- part contents for card part 17
----- text -----
Don't change space between rows.

-- part contents for card part 11
----- text -----
3.05

-- part contents for card part 19
----- text -----
Grid Tester